"soi" <-
structure(list(rain = c(553, 460, 399, 470, 448, 395, 556, 614, 
453, 389, 545, 582, 439, 422, 426, 431, 440, 441, 381, 388, 499, 
440, 395, 452, 464, 363, 417, 396, 381, 497, 394, 502, 525, 423, 
385, 417, 404, 532, 400, 513, 658, 373, 395, 474, 483, 599, 635, 
408, 447, 441, 491, 362, 457, 481, 452, 362, 409, 440, 578, 435, 
395, 528, 372, 686, 797, 619, 576, 491, 551, 484, 449, 560, 424, 
520, 584, 415, 425, 470, 464, 520, 435, 482, 467), soi = c(12.1, 
-5.2, -8.2, -6, -13.2, -10.6, 7.1, 19.8, 0.9, -9.1, 1.9, 1.6, 
4.1, -2.7, 4.3, -1.6, -3.6, -1, 4.5, 4.8, 0.5, -0.7, -8.5, 1.8, 
0.3, 1.7, 0.5, 1.2, 8.7, 0.5, -13.4, -12.4, 1.3, 4.1, -1.9, 4.3, 
-6.4, 2.1, -1.2, -1, 14.6, -0.8, -2.4, -6.7, 3.9, 10.2, 10.2, 
-3.9, -3.4, -0.1, 3.5, 0.8, 5.2, -2.1, 5.7, -8, -4.1, 3, 2.8, 
-5.3, 3.8, 10.3, -7.1, 7, 9.3, 12.9, 1, -9.4, -1.8, -1.9, -2.9, 
1.7, -12.7, -8, -0.1, 0.7, -2.7, -12.3, 7.6, 6.2, -2.3, -8.5, 
-9.9), year = c(1910, 1911, 1912, 1913, 1914, 1915, 1916, 1917, 
1918, 1919, 1920, 1921, 1922, 1923, 1924, 1925, 1926, 1927, 1928, 
1929, 1930, 1931, 1932, 1933, 1934, 1935, 1936, 1937, 1938, 1939, 
1940, 1941, 1942, 1943, 1944, 1945, 1946, 1947, 1948, 1949, 1950, 
1951, 1952, 1953, 1954, 1955, 1956, 1957, 1958, 1959, 1960, 1961, 
1962, 1963, 1964, 1965, 1966, 1967, 1968, 1969, 1970, 1971, 1972, 
1973, 1974, 1975, 1976, 1977, 1978, 1979, 1980, 1981, 1982, 1983, 
1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992)), .Names = c("rain", 
"soi", "year"), row.names = c("1", "2", "3", "4", "5", "6", "7", 
"8", "9", "10", "11", "12", "13", "14", "15", "16", "17", "18", 
"19", "20", "21", "22", "23", "24", "25", "26", "27", "28", "29", 
"30", "31", "32", "33", "34", "35", "36", "37", "38", "39", "40", 
"41", "42", "43", "44", "45", "46", "47", "48", "49", "50", "51", 
"52", "53", "54", "55", "56", "57", "58", "59", "60", "61", "62", 
"63", "64", "65", "66", "67", "68", "69", "70", "71", "72", "73", 
"74", "75", "76", "77", "78", "79", "80", "81", "82", "83"), class = "data.frame")
